From: Dmitry Gutov <dgutov@yandex.ru>
Date: Fri, 29 Jan 2021 13:53:28 +0000 (+0200)
Subject: (xref-revert-buffer): Also 'erase-buffer' when handling a user-error
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~28^2~15^2~4291
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/%22/%22http:/www.example.com/cgi/%22?a=commitdiff_plain;h=e86b30d6fd04070b86560774ec82392dbe24ca1e;p=emacs.git

(xref-revert-buffer): Also 'erase-buffer' when handling a user-error

* lisp/progmodes/xref.el (xref-revert-buffer):
Also 'erase-buffer' when handling a user-error (bug#46042).
---

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index 07a65d4ed93..18fdd963fb1 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -972,6 +972,7 @@ Return an alist of the form ((FILENAME . (XREF ...)) ...)."
             (erase-buffer)
             (xref--insert-xrefs alist))
         (user-error
+         (erase-buffer)
          (insert
           (propertize
            (error-message-string err)